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Macro Assembler in EPROM 


A number of you have asked about the possiblility of getting 
the S-C Macro Assembler in EPROM to put on an Apple Firmware 
card, or a CCS 12K Eprom card. If you want to do it, and know 
how to modify the firmware card to accept EPROMs, I will send a 
set of 5 EPROMs containing the assembler for $64. If you also 
need the monitor in EPROM, add another $16. The assumption 
will be that you have Applesoft on the mother board, and that 
you already own the S-C Macro Assembler on disk. 


Advertising in AAL 


Due to the increased costs of printing more than 1600 copies 
per month, and with the desire to limit the percentage of 
advertising pages to less than 30% each month, I have decided 
to raise the page rate again. 


For the June 1982 issue, the price will be $50 for a full page, 
$30 for a half page. So-called "classified" ads, of up to 
forty words, will be §$5. 


The Best Book So Far for Beginners 


Roger Wagner's book for beginners wanting to learn assembly 
language programming is now out, at $19.95. (My price is only 
$18.) Called “Assembly Lines: The Book", it began as simply a 
reprint of the series Roger writes for Softalk Magazine. But 
there is a lot more material in the book, and 100 pages of 
Appendices. Appendix B, 70 pages, is a very lucid description 
of every 6502 opcode. If you rank yourself as a beginning 
spataagal language programmer, this book will be a tremendous 
elp. 


Secret RWTS Caller Inside DOS....ccceccccecscoeceseeBill Parker 


I found a portion of code tucked away in DOS that will perform 
a RWTS for you, doing away with the necessity of finding a 
place to put a controlling subroutine, an IOB, etc. 


As you know. RWTS (Read/Write Track and Sector) gives the 
programmer the ability to read a sector from any specified 
track and put it in a buffer in RAM. It also allows the 
programmer to manipulate the buffer and write it back out to 
any specified track and sector on the disk. 


In this 48K DOS routine, which happens to be the same for 3.3 
as well as 3.2, all the programmer has to do is to plug in the 
track and sector desired and whether he wants to read it from 
disk to the buffer, or write it from the buffer to the disk. 
(The buffer is a fixed 256-byte location beginning at $B4BB 
(46267).) A simple CALL 45111 or a JSR $B037 will then perform 
the transfer. (You must remember to restore the original 
Read/Write code back to "2" when you are finished, so that the 
system can write to the directory when it needs to). 


Here is a disassembled and commented version of the routine, 
which (for lack of a better term) I have named "WRTDIR®. This 
should aid in the development of programs that need to examine 
or alter the contents of a disk. 


This routine, which normally writes a directory sector to the 
disk from the buffer at SB4BB.B5BA (46267-46522), can be used 
as a general RWTS utility by plugging in: 


Value Name S$Loc Loc 
Read/Write (1/2) RW $B041 45121 
Track No. ($0-$22) TK $B397 45975 
Sector No. ($0-S$F) SC $B398 45976 


Then call 45111 or JSR $B037 and set RW to 2 when done. 


1000 OR $B0 
1010 ‘OR 3 BON DIR 
AAC6- 1030 BUFSTHI .EQ $AAcé 
AAC5~ 1080 BUFSTLO EQ $AAC5 
B052- 1050 CALLRWTS [EQ $B052 
B7F0- 1060 IOBBUF ‘EQ $B7FO 
B393- 1060 3c "EG $8398 
- eE B 
B397- 1090 TK “EQ $8339 
BO37~- 20 45 BO 1110 WRTDIR JSR SETBUFAD ~~ 
BO3A- AE 97 B3 1120 LDX 
BOSD- AC 98 B3 1130 LDY SC 
BOMO- AS 02 ~~ 1140 LDA 
BON2- RC 52 BO 1150 | CALLRWTS 
BO45- AD C5 AA 1170 SETBUFAD LDA BUFSTLO. PUT BUFFER'S 
BONS- 8D FO BY 1180 STA IOBBUF STARTING ADDRESS IN 
BOMB- AD C6 AA 1190 LDA BUFSTHI INPUT OUTPUT BLOCK 
BOME- 8D F1 B7 1200 STA IOBBUF+1 
BO51- 60 1210 RTS 
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Some Patches for the S-C Macro Assembler....Bob Sander-Cederlof 


1. Loading the Language Card version: When you type "EXEC 
LOAD LCASM", the language card is loaded with a copy of the 
monitor from the Apple mother board, and with the file 
S-C.ASM.MACRO.LC. The EXEC file also makes a small 
modification to the memory image depending on which language 
you have on the mother board. 


If you have serial number M-5275 or earlier, the EXEC file does 
not do the final step of turning on the Assembler. I expected 
you to type the DOS command “INT" (if Applesoft is on the 
mother board) or "FP" (if Integer BASIC is on the mother board) 
to enter the Assembler. 


You can make a minor change to the EXEC file to make it 
automatically turn on the assembler after loading. The next to 
the last line of the EXEC file is now "C082"; change it to 
"C080" for automatic turn-on. 


Here is a step-by-step procedure for the change. Try it on a 
COPY of the master disk, in case you make a mistake. 


1. Get into the S-C Macro Assembler, either regular of 
language card version, it doesn't matter which). 


2. Type “AUTO". The Assembler will print ":1000 * and 
wait for input. 


3. Type five (5) backspaces (left arrow) to position the 
cursor right after the prompt. 


4. Type “EXEC LOAD LCASM", and the Assembler will load 
the EXEC file into memory. You will see a list of line 
numbers on the screen. 


5. Type five backspaces and the word "MANUAL" to turn off 
the auto-line-number mode. 


6. LIST the lines (type "LIST"). 


7. See line 1090? It should be "C082". Type "1090 C080" 
to change it. 


8. Type “TEXT LOAD LCASM"® to save the modified version. 
9. That's all there is to it! 


By the way, Bob Potts (from the Bank Of Louisville) was here 
last week. He brought along a Corvus 5-meg drive. so we put 
the Language Card version of the Assembler on it. For some 
reason which we can't explain, the EXEC file hangs up after the 
BLOAD (but only if the language card has not been loaded since 
power up). We changed the EXEC file slightly, and it always 
worked. Instead of doing the BLOAD while in the monitor, we 
did it from Applesoft. Here is the new version of the file: 
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REM LOAD S-C MACRO ASSEMBLER 
REM INTO THE LANGUAGE CARD 
CALL~-151 

c08s1 Cco8l 

F800<F800.FFFFM 

BLOAD S-C.ASM.MACRO.LC 
300:A9 4C CD 00 EO FO 12 8D 00 EO A9 O00 8D 01 EO AS DO 8D 
02 EO A9 CB 8D Di 03 60 

300G 

C080 

3D3G 


You may also want to change the HELLO file to include an option 
to EXEC LOAD LCASM automatically. 


2. If you have a Language Card, and your Assembler has a 
serial number of about M-5030 or earlier, the memory limits are 
not set up properly in all cases. 


Check your copy of S-C.ASM.MACRO.LC by loading it into the 
language card and typing "$D2C6" from inside the assembler. If 
you don't have SAO there, then you need to install this patch: 


1. Type in these monitor commands: 


:$D2C6:A0 OC 
:$D2C8:20 1E D3 A9 00 91 58 85 
:$D2D0:D9 AD 00 EO C9 4C FO 08 


2. Type “BSAVE S-C.ASM.MACRO.LC,A$D000,L$231F". 


3. If you have serial number M-5287 or earlier, a more 
difficult to apply patch is needed to correct a problem in 
printing the symbol table. If you are using the .TI directive, 
and if you have several lines of local labels in the symbol 
table listing, and if the page break comes between two such 
lines, the listing is messed up in a disastrous way. 


To fix the S-C.ASM.MACRO. do the following (very carefully): 
1. Get into the assembler by typing “BRUN S-C.ASM.MACRO". 
2. Type the following monitor commands: 
: S2AF<26AF.26D5M 
:$26B1<2AF.2D5M 
s$26AF:84 2F 
:$26C1:CA 
3. Type “BSAVE S-C.ASM.MACRO,A$1000,L$21D3" 
To repair the language card version, do the following: 


1. EXEC LOAD LCASM, and get into the assembler by typing 


INT (unless you already made the change to the EXEC file 
noted above). 


2. Type the following monitor commands: 
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:$C083 C083 

: S2AF<E7FB.E821M 
: SE7FD<2AF.2D5M 
:SE7FB:84 2F 
:SE80D:16 


3. Type “BSAVE S-C.ASM.MACRO.LC,A$D000,LS$231F" 
If these patches and my instructions seem too difficult, you 
can send me $2.50 and your S-C Macro Assembler diskette; I will 


update it with the new HELLO program, the new LOAD LCASM file, 
and the patched copies of the assembler. 


Vinyl Diskette Pages for your S-C Assembler Binder 


I am having 1000 special pages manufactured. They will fit the 
binder that comes with the Macro Assembler, and will hold one 
diskette each and a 3x5 index card. For $6 I'll send you ten 
of them. For $12 I'll send them in a binder. For $36 you can 
have a binder with ten blank diskettes in vinyl pages. The 
binder is also just right for storing back issues of AAL. 


g 
Zs av 


"TOTALLY AMAZED - a VERY VALUABLE & NECESSARY PROGRAMMING TOOL'' 
Larry Shock£Ley, Anchorage AK 


"LEARNED MORE about ASSEMBLY LANGUAGE in 3 HOURS with JOHN'S DEBUGGER than 
in the LAST 3 YEARS - EXCELLENT DOCUMENTATION" 
Jernry Wolf, Rivewoods IL 


S Fer TRACE 0cic w/ INSTRUCTION - NOTING ALL JMPS,JSR, etc 


ASSEMBLY LANGUAGE PROGRAMMING STEP EACH INSTRUCTION DISPLAYING: 
P APPLE Il LURES SIMU A POINIER CMCSA IN CIMA 
By LL . = 
W THE COMPUTER -LAST 8 BYTES ON THE STACK  -DISPLAY OF ALL FLAGS SET 
DISPLAY WHAT IS IN ANY 12 MEMORY POSITIONS WITH LABELS 
OPTIONS CAN BE USED IN ANY ORDER: STEP, TRACE, CONTINUOUS, 
NOW YOU CAN TRACE on STEP any ssoz INSTRUCTION ONE PAGE, SINGLE LINE, MONITOR EXIT & RETURN TO PROCESSING 


JOHN' 
BEGIN DEBUGGING FROM ANY POINT within youR PROGRAM A SECAYE RAAT AE. I ree mae neat 


COMPUTES EFFECTIVE ADDRESS FOR ALL ADDRESSING MODES BREAKS UP CODE INTO UNDERSTANDABLE SUBROUTINES 
& DISPLAYS ALL MEMORY CHANGES (BEFORE/AFTER) HIGHLIGHTS ALL POSSIBLE LOGIC CHANGES with arrows 
Options to quickly move thru your program-selected (DOES THIS INSTANTLY - NO WAITING) 
memory, equal zero, leave subroutine, etc. . 
YOU ARE IN COMPLETE CONTROL OF THE PROCESSOR AS YOU FOUNISDEnUGEE 
LOOKING FOR POSSIBLE ERRORS BOTH ON DISKETTE 59.95 
L f ry 

BREAKPOINT sreak ON KEYPRESS, CYCLE COUNTER,ETC 
(6 OPTIONS) INCLUDES TIMING DELAY FROM 0.0 to 200 SECONDS John Broderick ,CPA 
(ALL OF THE ABOVE SAVES THE ENTIRE PAGE OF THE STACK) Broderick & Associates 


REQUIRES: 48K (MACH LANGUAGE USES FROM 8400 TO 9600, 8635 SHAGROCK: DALLAS, TEXAS 75238:(214) 341-1635 
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PPSON HIERCCRAPHIC TRANSPORT 


PRINTER GRAPHICS SOC vormre 


TRANSPORT FEATURES: WINDOH CONTROL 8 HI-RES SCREEN (AS SHOWN ABOVE) ALLOWING ANY RECTANGULAR AREA OF THE 
SCREEN TO BE SELECTED FOR PRINT; VARIABLE SCALE IN BOTH HEIGHT AND WIDTH OF THE PICTURE ALLOWING STRETCH ANS 
HAGNIFICATION; WORMAL OR ROTATED PICTURE; POSITIVE OR NEGATIVE PRINT; PICTURE FILES LOADED WITH A SINGLE KEY 
PRESS; WODULE INCLUDED THAT WAY BE CALLED FROM BASIC; WRITTEN IN MACHINE LANGUAGE. 


FOR 46K APPLE TI/APPLE IT PLUS WITH EPSON MX-70/00/100 PRINTER (WX-80 NUST HAVE GRAFTRAL 00 GRAPHICS GPTION) 


QPP IT / PPLE 11 Pus aOe Teasers OF PLE GRIP UTER, bet. 
GOR ~70/00/100 aa GRAPwTAAL OO GRAPHICS ME TRG © Oe ERICA, it. 


THE CLONE KIT 7222495 


CLONE KIT IS A MULTI-PURPOSE BIT COPIER FOR THE APPLE II COMPUTER, 
GIVING YOU THE MEANS TO PROTECT YOUR INVESTMENT IN SOFTWARE BY 
BACKING UP MOST OF YOUR “PROTECTED” DISKETTES. 


WITH CLONE KIT YOU CAN: 


- BACKUP DISKETTES USING SYNCHRONIZED TRACKS AS PROTECTION 

—- BACKUP DISKETTES USING A MODIFIED DOS 

—- COPY ONLY SELECTED TRACKS (USEFUL TO RESTORE A “BLOWN” DOS) 

—- MAKE A SINGLE DRIVE BACKUP 

—- DUPLICATE DISKS USING SPECIAL TIMING FOR PROTECTION 

—- PROVIDES EXTENDED INFORMATION FOR VIEWING THE DISKETTE STRUCTURE 
- COPY PASCAL AND CP/M DISKETTES QUICKLY AND EASILY 


WORKS WITH BOTH 13 AND 16 SECTOR DISKETTES 
WRITE OR CALL (214) 259-6482 OR (214) 259-3196 


HIEROGRAPHIC TRANSPORT ... $39.95 
THE ‘CLONE KIT eeneveveenvanevnen C9295 134.95 


DEALER INQUIRIES iII$INVITED 
HSSHLRTES - P.O. BOX 401462 — GARLAND, TEXAS 75040 ais 


4.0. 
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Benchmarking Block MOVES...ccccccccceceee William R. Savoie 


While working on my new soon-to-be-released data file system, I 
came to see the importance of a speedy 6502 block move routine. 
I have resisted “moves" like the coming of winter. I have a 
super two pass sort routine that is very fast. Providing a 
person has less than 2000 files there is no need to do much 
file moving, since only pointers need move. (My system has a 
64K card, giving me a 112K system.) 


Unfortunately, the real world needs some 10,000 or more files, 
and these of course must be sorted too. By physically moving 
the files as directed by the sorted pointers, and then moving 
all this to disk, it is possible to use a merge sort to get the 
whole job done in the least amount of time. With this preamble 
behind us, let's get on the move! 


I have benchmarked three approaches to moving blocks: the 
monitor move down (located at SFE2C) which I'm sure you all 
have used, and its variation, a similar move up routine. Next 
is the Applesoft block move, and third is a self modifying move 
which I call "Quick Move", 


To ease such a tedious undertaking, I have included a BASIC 
connection to pass variables and determine the benchmark 
precision. To help further, I have added a hex converter, a 
memory Gump routine, and an automatic 3D0G vector using the 
ctr1-Y command from the monitor. To help with the problem of 
what block of memory was moved where, I wrote a memory fill 
routine. This acts to place the memory address back into 
memory, on two-byte boundaries. You can easily read memory to 
see where it came from. 


My first benchmark was a block move of 10,000 bytes made 100 
times. The next was a move of 10.240 bytes, again made 100 
times. Here are the conditions and resulting times: 


mon up mon dn AS QM 
Case I LO=18674=S48F0 47 53 17.2 15.3 
seconds 
Case II Lo=18432=$4800 48.7 54.7 16.7 14.7 


Note: 0.5 seconds of these values due to BASIC overhead. 


As you can see, the old monitor move is not made for high speed 
moves. For one thing, a two-byte subtraction is carried out 
for each byte that is moved. It is much more efficient to do 
the subtraction only once, before you start. A closer look 
shows that it is faster to move more data, providing you move a 
whole number of memory pages! The time needed to move the 
“extra” 240 bytes was negative 0.5 seconds for the Applesoft 
block move and negative 0.6 seconds for the “Quick Move". 

There was no sensitivity to start and destination boundaries. 
"Quick Move" was 3.7 times faster than the monitor movel 


I tried putting the first half of Quick Move on page zero at 
SAO, but the speed improvement was only 0.7 seconds (about 5%) 
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100 
105 
106 


107 
108 


109 
110 


112 
114 
115 
118 
130 
134 
136 


140 
150 


160 
170 
180 
190 
200 
210 
220 


230 
240 


250 
300 
305 


310 
320 
330 


over the time it took when located at $3000. 
As a further note, each move routine requires its own parameter 


organization. If files are to be moved and not lost, attention 
must be paid to exact specification of end points and lengths. 


GOSUB 300: REM INITIALIZE BINARY PROGRAM 


A = 0:B =0:C = 0:J = 0 


TEXT : HOME : PRINT : PRINT " BLOCK MOVE TESTING"; SPC( 8)"L 
OOP = ";L + 1: PRINT : PRINT "(0) END" SPC( 13)"(1) TEST OVE 
RHEAD": PRINT : PRINT °(2) M.MOVE UP" SPC( 7)"(3) M.MOVE DOW 
N* 
PRINT : PRINT "(4) A.MOVE UP” SPC( 7)"(5) QUICK MOVE DOWN": PRI! 
: PRINT "(6) HEX DUMP" SPC( 8)"(7) ADDRESS FILL" 
PRINT : PRINT "(8) HEX CONVERT" SPC( 5)"(9) EDIT": PRINT : PRIN! 
“(10) MONITOR WITH CTRL-Y RETURN": PRINT 
PRINT "(11) SET CALL LOOP = 100%: PRINT 
PRINT “PICK TEST NUMBER (0 TO 11) “3: INPUT I: IF I < 0 ORI 

> 11 THEN 110 


HI = 28672: REM $7000 HI BLOCK 
LO = 18672: REM $48F0 LO BLOCK 
LO = 18432: REM $4800 LO BLOCK 
LE = 2056: REM $808 LENGTH OF MOVE 


ON I GOSUB 150,160,170,180.190,200,210, 220,230, 240,250 

IF I = 0 THEN END 

IF I > 5 THEN PRINT : PRINT "HIT ANY KEY "3: GET A$: GOTO 1 
05 

PRINT CHRS (7)3I1;3" DONE "333" TIMES": GET A$: GOTO 105 


A = LO:B = LO:C = LO + 1: FOR J = O TO L: CALL BASE,A,B,C: NEXT 


: RETURN : REM TIME BASIC 


A = LO:B = HI:C = HI + LE: FOR J = O TO L: CALL BASE,A,B,C: NEXT 


: RETURN : REM M.MOVE UP 


A = LO:B = HI:C = LO - LE - 1: FOR J = O TO L: CALL BASE,A,B, 
C: NEXT : RETURN : REM M.MOVE DOWN 

A = HI:B = LO:C = HI + LE: FOR J = 0 TO L: CALL BASE + 3,A,B, 
C: NEXT : RETURN :; REM A.MOVE UP 

A = LO:B = LO - LE:C = HI - LO: FOR J = 0 TO L: CALL BASE + 6 


,A,B,C: NEXT : RETURN : REM QUICK MOVE DOWN 
CALL BASE + 9,LO - LE - 32,0,HI + LE + 32: RETURN 
CALL BASE + 12,LO - LE - 16-HI + LE + 16,0: RETURN 


HOME : VTAB 8: PRINT "INPUT DECIMAL NUMBER °;: INPUT N: CALL 
BASE + 15,N: RETURN : REM HEX CONVERTER 

TEXT : HOME : POKE 33,33: LIST : END 

HOME : FOR I = 1017 TO 1018:A = PEEK (I - 40): POKE I,A: NEXT 


: POKE 1016,76: POKE 72,0: CALL - 151 


L = 99: GOTO 105 


HIMEM: 12287: REM $2FFF 


BASE = 12288: IF PEEK (BASE) = 76 THEN RETURN : REM .OR $30 


00 


D$ = CHRS$ (13) + CHRS$ (4) 


PRINT D$"BLOAD B.BLOCK MOVE BENCHMARKS" 
PRINT ;: RETURN 
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BREWS WEE REGU 
Instant Posting- immediate Reporting 


POWER to make fast, efficient management decisions. POWER to 
adjust to fluctuations In sales. POWER to increase productivity and 


profits. 


>. B.S is more than just a general ledger ... it's business information 
system that can produce selected business activity reports 


immediately. 
B.1.S IS FAST 
e Machine language saves time ... accepts 3000 entries a day 
as fast as you Can type. Every entry is saved for selective 
analysis. 
e instantaneous posting - 40 split entries can be 
completely posted in less than 20 seconds. 
e Immediate reporting - within four minutes of any 
entry, a complete BALANCE SHEET, P&L, or DETAILED 
SELECTIVE ANALYSIS REPORT reflecting that entry 
can be printed and reviewed. 


B.1.S IS FLEXIBLE 

¢ Define your own Journal Names, 

Account Prompts, Activity Codes, 

% Custom Report Generators, Account 

«, Ranges and Descriptions. 

 ¢ Asingie B.I.S General Ledger 
handies THREE completely separate 
sets of books with consolidating 


capabilities. 


B.1.S IS EASY TO USE 
e Menus are simple. 
e Accounts and Journals are 
already set up. 
® Hand-hoiding Tutorial 
Manual outlines every 
key stroke. 


hase Put the power of 
B.1.S to work for you. 


B.I.S is available from your local Apple 


dealer for $295. 
if he’s out of stock, have him give us a 


cali at (214) 341-1635 or write: 


John Broderick CPA 
Broderick & Associates 


8635 Shagrock 
Dailas, Texas 75238 
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BENCHMARKING BLOCK MOVES 


# 

® # 
@ @ 
# BY WILLIAM R. SAVOIE 3/82 # 
# LIMERICK TRAINING CENTER ® 
* C/O GENERAL PHYSICS CORP. ® 
@ # 
@ # 


341 LONGVIEW | RD., LINFIELD 
PENNSYLVAN FIP 1 19468 
ddscenuncnecnseabacesen Se8eea 


AiL ~EQ 35 MONITOR 
A1H -E D USE 

AeL -EQ $3E FOR 

A2H -EQ $3F BLOCK 

A3L EQ $40 MOVE 

A3H EQ $41 

A4L EQ 342 

AH EQ $4 

FACMO .EQ $A FP REGISTER 
FACLO .EQ $3A1 FP REGISTER 


BLTU .EQ $D39B BLOCK TRANSFER 
FRMNUM .EQ $DD607 FORMULA=>NUM 
OMA .EQ $DEBE CHECK COMA 
AYINT .EQ $E10C MAKE INTEGER 
PRNTX .EQ $F944 PRINT X 
NXTA1 .EQ $FCBA INCR POINTER 
PRBYTE .EQ $FDDA PRINT A 
VE .EQ $FE2C MONITOR MOVE 
Swe meee meme ee neem eee & 
-OR $3000 
-TF B.BLOCK MOVE BENCHMARKS | 


® THIS CODE ALLOWS SIMPLE ENTRY WITHOUT THE & COMMAND 


BEGIN JMP MONITOR.MOVE 
JMP APP 


LESOFT.MOVE 

JMP QUICK .MOVE 

JMP DUMP HEX OUTPUT 

JMP FILL LABLE MEMORY 
® TO HELP A HEX CONVERTER 
CONVERT 

JSR GETVAR GET VARIABLE 

JSR PRNTX HI BYTE OUT 

LDA FACLO GET LOW BYTE 

JMP PRBYTE HEX OUTPUT 


# THIS CODE FILLS MEMORY WITH IT'S OWN ADDRESS 


# WHICH IS VERY USEFULL FOR CHECKING BLOCK MOVES 
FILL JSR GM GET VARIABLES 
01 LDY #$01 TWO BYTE OFFSET 
LDA AIL GET LOW BYTE 
STA (A1L),Y WRITE ADDRESS LO 
DEY MOVE LEFT 
LDA A1H GET HI ADDRES 
STA (A1L),¥ WRITE TO MEMORY 
JSR NXTA1 INCREMENT PTR 
JSR NXTA1 TWICE 
re 01 GO TELL DONE 


1740 
1726 # A UTILITY DUMP TO SEE MEMORY FROM BASIC 
3031=- 20 67 30 1760 DUMP JSR GM GET VARS 
3034— AD 10 CO iio LDA $CQ10 CLEAR STROBE 
3037- AD 00 CO 1780 .01 LDA $C000 GET KEY IF ONE 
30387 10 OF hao BPL 503 GO DUMP HEX 
03C- AD 10 CO 1800 LDA $C010 CLEAR STROBE 
303F- AD 00 CO 1810 .02 LDA $C000 READ KEY AGAIN 
3042=- 10 FB 1820 BPL .02 WAIT FOR KEY 
ke or al 
SUE 19 08 1S gg BA Hogg Shae sznone 
OMKE- AS 3E 1379 LDA A2L END LOW 
050- C5 Al 1830 CMP $A1 DESIRED LOW 
3052= A5 3F 1890 LDA A2H HI TOO 
3054- E5 AO 1900 SBC $A0 ENOUGH? 
SE OF URR gy GcOt OO HLL pom 
1930 
130 se uae van Cees FROM BASIC 
1820 bd <65ae OR SYNTAX re 
; ad PLACE TN REGISTERS X AND A 
3059- 20 BE DE 1360 GETVAR JSR COMA MUST SEE COMA 
05C- 20 67 DD 1990 JSR FRMNUM GET NUMBER 
O5F- 20 OC E1 2000 JSR AYINT MAKE INTEGER 
3062- A6 AO 2010 LDX FACMO HI BYTE 
3064—- A5 Al 2020 LDA FACLO LOW BYTE 
3066- 60 a : RTS 


ATTENTION MX-80O0 OWNERS! 


Are you frustrated by all those great prograsaable features on your MX-80 printer? Would you like to sake 
use of the various font combinations but can’t remember the commands? Are you annoyed that your MX-80 
doesn’t skip over the perforation? Would you like your hard copy output docusented with a title, date and 
page nuaber? if your answer to these questions is YES, then read on. 


INTRODUCTING THE MX-S80 FORMATTER ROM 
Now you can easily obtain full control of your printer. The MX-80 Formatter program 1s contained in ROM so 
its always on-line. It provides a convenient aethod for aanually setting the MX-80 to the configuration 
YOU want without the need for special disk-based software drivers. This printer utility 1s user-friendly 
and Simple to operate. A printer attributes list clearly displays the current command status. Changes to 
printing fonts, line length, foras length, date, title, etc are easily perforaed. 


The Formatter ROM is currently configured for use with HX-80 or NX-B0FT printers with GRAFIRAX. Requires 
an APPLE I! or APPLE I! Plus with either an Epson, Ty@ac or equivalent parallel printer interface card. 
Formatter ROM plugs directly into either Mountain Computer’s KoaPlus board or DataShift’s MiniRom board 
(SPECIFY with your order which ROM board you are using since their foraats are difterent). 


MX-80 Formatter ROM: $29.00 
Avoid A $3.00 Shipping/Handiling Charge By Mailing Full Payaent With Order 


RAK - WARE 
41 Ralph Road 
West Orange NJ 97052 
(201) 325-1885 


$8982 GAY YOU SAW 11 IN ’APPLE ASSEMBLY LINE’ 8839 
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2050 
5060 # GET BASIC VARIABLES INTO THE 


2070 # MONITORS WORK REGISTERS USED BY 
2080 * COMMANDS M,V,G,L,S,1,-,+,--ETC 
067- 20 0 2100 GM JSR GETVAR BLOCK START 
06A~ 5 22 : 2110 STA A1L LOW BYTE 
06C- D 2120 STX A1H BYT 
O6E- 20 59 30 2130 JSR GETVAR BLOCK END 
071- 85 3E 2140 STA A2L 
073- 86 3F 2150 STX A2H HI BYTE 
075- 20 59 30 2160 JSR GETVAR DEST. START 
076- 9 2 2170 A AAL LOW 
O7A- 86 43. 39 22180 STX AH HI 
307C- 60 2190 RTS 
2210 Bamenennneenmenenennnmewenmnnnan ® 
2220 ® THE OLD MONITOR MOVE ® 
22 o8 MOVE BLOCK OF MEMORY UP/DOWN # 
2250 
2260 MONITOR.MOVE 
O7D~ 20 67 30 2270 SR SET UP MOVE 
080- A5 3 2280 LDA AIL START LOW 
30 2- c5 he 2290 P AUL END LOW 
O8h- Ad 3D 2300 LDA AlH START HI 
08G- E5 3 2310 BC A4H WHICH BIGGER? 
088- BO 2 2 20 BCS MOVEDN GO DOWN IN MEM 
308A- AO 00 att MOVEUP LDY #$00 CLEAR INDEX 
O8C- B1 3E 2350 01 LDA (A2L),Y | GET DATA 
O8E- 91 h2 2360 STA (ANL);Y | PUT DATA 
090- A5 42 2370 LDA ASL GET INDEX 
092- Dd 02 ~=—s_« 2380 BNE .02 PAGE CROSS? 
09h- C6 4 2390 DEC A4H HI BYTE 
096- C6 4 200 .02 ~3=s dDEC.:«AAL LOW BYTE 
098= A5 3E 2410 LDA A2L 
O9A- C5 3C 2420 CMP AIL END YET? 
09C- A5 3F 2430 LDA A2H 
O9E- E5 3D 24hO SBC A1H 
OAO- A5 3E 2450 LDA A2L 
OA2= DO 2460 BNE . PAGE CROSS? 
OAH- 6 3E 2470 DEC A2H HI BYTE 
OA6= C6 3E 2480 .03. DEC LOW BYTE 
OA8= BO E2 2490 BCS .01 GO TELL DONE 
OAA- 60 2500 RTS 
30AB- AQ 00 ##$ 2520 MOVEDN LDY #$00 CLEAR INDEX 
30AD- 4C 2C FE 2530 JMP MOVE MONITOR MOVE 
2550 
2560 . Ceci CSnetemn lee oueasolsesse # 
2570 ® AND ALONG CAME THE PEOPLE AT ® 
2580 * MICROSOFT WITH THEIR MOVE ® 
5330 ® Sawees aSOe es aeeeeesweaseweneaunaee 
2600 
2610 APPLESOFT.MOVE 
30B0- 20 59 30 2620 JSR GETVAR HI ADDRESS OF BLOCK TO MOVE 
0B3- 85 : 2630 ST 6 LOW 
OB5- 1 2640 STX $97 HI BYTE 
OB7- 20 59 30 2650 JSR GETVAR BLOCK END 
OBA- 48 2660 PHA SAVE TELL LAST 
OBB- 8 2670 TXA NEED 9B 9c 
OBC- 4 2680 PHA TO GETVARS 
OBD- 20 59 30 2690 JSR GETVAR HI ADDRESS OF DISTINATION 
0Cco- 85 9 2700 STA $9} LO&HI BYTES 
30C2- 86 95 27110 STX $95 
2730 ® WE USED $9B,9C TO GET THE TWO BYTE FP VALUE 
30C4- 68 2740 PLA END OF BLOCK 
0C5=- 85 9C 2750 STA $9C HI BYTE 
OC7= 6 2760 PLA 
30C8- 85 9B 2770 STA $9B LOW BYTE TOO 
30CA- 3 2780 SUBTRACT COMMING 
30CB- 4c 9B D3 2790 JMP BLTU A.MOVE 
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-C SOFTWARE 


Lexan 


eThe FLASH compiler 48k Apple Il or Apple I! 
Plus using DOS 3.3. To edit Integer BASIC pro- 
grams, you need Integer BASIC in ROM ora 
language card. Compiled programs will run with- 
out Integer BASIC. Six demos included on disk. 

eFLASH compiled programs run incredibly fast. 
Far faster than compiled Applesoft programs. 
Speed is why people buy compilers. 

033 Powerful Extentions added to BASIC inclu- 
ding: DATA, READ, DRAW, SDRAW, HOME, 
HPLOT, HGR, CHR$, HCOLOR =, HBACK, 
HFIND, TONE, NOTE, GET, 16 bit PEEKs and 
POKEs, hex input/output, strings to 32767 char- 
acters and more....... 

eFLASH can print paginated Assembly Language 
listings so you can see the code that FLASH 
generates. Complete with full symbolic labeling 
for line numbers, forward references and user 
labels. 

eFLASH can write assembly language sources 

files to the disk. These can be assembled with 

the S-C Assembler Il 4.0 and the FLASH Runtime 

Source Code. 


EVERYTHING YOU WANT 
IN AN INTEGER BASIC COMPILER. 


eFLASH can compile object code files to disk or 
to memory. No need to ‘BSAVE’ after compiling 
as with other compilers. 
eFLASH can position a program in memory where 
you want it to be. Skip over hires display buffers 
or machine language routines easily. 
eFull support for DOS 3.3 commands. 
$79 for FLASH compiler with 60 page manual. 
$39 for FLASH Runtime Source Code. (Run- 
time Source Code requires the FLASH 
compiler and the S-C Assembler |/ 4.0 
$55 for S-C Assembler II 4.0. | 
$80 for S-C Macro Assembler. 


WE WELCOME MASTER CARD AND VISA 
ORDERS, CALL: 


Laumer Research 

1832 School Road 
Carrollton, Texas 75006 
(214) 245-3927 


Apple Assembly Line....May, 1982....Copyright (C) S-C SOFTWARE....Page 13 


0 
2820 ® MOVING IN RAM CAN ® 
2830 § ® BE EVEN FASTER ; 


2840 Suman nwnnn nn now nnn ene 
2850 
2860 QUICK .MOVE 
OCE- 20 59 35 2870 JSR GETVAR GET START 
OD1- 8D EF 30 2880 STA .01+1 LOW BYTE 
30D4=- 8D 11 31 2890 STA .06+1 COPY HERE TOO 
30D7- 8E FO 30 2900 STX .01+2 HI 
ODA=- 20 59 30 2910 JSR GETVAR DESTINATION 
ODD- 8D F2 30 2920 STA .02+1 LO 
30E0- 8D‘14 31 2930 STA .07+1 COPY HERE TOO 
OE3- 8E F 3 2940 STX .02+2 HI BYTE 
OE6- 59 30 S320 JSR GETVAR END ADDRESS 
OE9- 8A 2960 TXA SET TEST FOR 
30EA=- FO 1% 2 r BEQ .05 MOVE<256? 
23 O ® X=PAGE BE dito. MOVE 
OEC=- AO 00 0 INDEX=0 
OEE- B9 00 48 3010 .01 4800,Y SOURCE 
OF j- 2 00 40 3020 .02 4000,¥ DESTINATION 
OF 4— 030 TNY NEXT BYTE 
OF5- DO F 040 BNE .01 SMALL MOVE 
OF7- EE FO 30 3050 .0 INC .01+2 HI SOURCE 
OFA- EE F3 30 0 .0 INC .02+2 HI DESTINATION 
OFD- CA 070 DEX DONE? 
OFE- DO EE at BNE .01 Y=0 SO MOVE PAGE 
100 ® SET UP REMAINING MOVE 
310 Re AN Al 110 .05 LDY x $A) LOW BYTE LENGTH 
102= FO 16 120 BEQ .0 GO IF NONE 
aie AD FO 30 3180 LDA .0}+2 COPY HI BYTE 
107- 8D 12 31 3140 STA .06+2 FOR SOURCE 
310R- AD of 0 3120 LDA .02+2 AND 
10D= 8D 1 1 : : STA .07+2 DESTINATION 
180 ® NOW WITH X=0 START MOVING LOW BYTE OF LENGTH 
185 ® fy) = LBA $4000 0X BYTES TO MOVE 
3110- BD 00 48 3190 .0 re tie SOURCE 
1i3- 9D 00 40 3200 .07 STA 4000,X DESTINATION 
116—= Bg 210 INX NEXT 
ey es 220 DEY MOVE ENOUGH? 
118= DO F6 at BNE .06 GO TELL DONE 
311A= 60 3240 .08 RTS 


APPLE MUSIC SYNTHESIZER BREAKTHROUGH 


e COMPLETE 16 VOICE MUSIC SYNTHESIZER ON ONE CARD, JUST PLUG IT INTO YOUR APPLE, CONNECT THE 
anor Area eae TO YOUR STEREO AND BOOT THE SUPPLIED DISK AND YOU'RE READY TO ENTER 


°eiT’S EASY TO PROGRAM MUSIC WITH OUR “COMPOSE” SOFTWARE. YOU'LL START RIGHT AWAY AT 
INPUTTING YOUR FAVORITE SONGS. OUR MANUAL SHOWS YOU HOW, STEP BY STEP. THE HI-RES SCREEN 
SHOWS WHAT YOU'VE ENTERED IN STANOARD SHEET MUSIC FORMAT. 


e WE GIVE YOU LOTS OF SOFTWARE. IN ADDITION TO “COMPOSE” AND PLAY PROGRAMS, THE DISK IS FULL 
OF SONGS READY TO RUN. 


* FOUR WHITE NOISE GENERATORS (GREAT FOR SOUND EFFECTS). 
© PLAYS MUSIC IN TRUE STEREO AS WELL AS TRUE DISCREET QUADRAPHONIC. 


e ENVELOPE CONTROL (VOLUME) 


e WILL PLAY SONGS WRITTEN FOR ALF SYNTHESIZER (ALF SOFTWARE WILL NOT TAKE ADVANTAGE OF ALL 
THE FEATURES OF THIS BOARD, THEIR SOFTWARE SOUNDS THE SAME ON OUR SYNTHESIZER). 


¢ AUTOMATIC SHUTOFF ON POWER-UP, OR IF RESET IS PUSHED. 
¢ MANY, MANY MORE FEATURES. 


ALL G@ABERS SHIPPED SAME DAY MASTER CHARGE & VISA WELCOME 
(TEXAS RESIDENTS AboSs SALes TAX) (214) 492-2027 
APPLIZO ENGINEZRING 

P.O. BOX 470301 7:00 AM - 11:00 PM 7 DAYS A WEEK 


DALLAS. TEXAS 75247 APPLE PERIPHERALS ARE OUR ONLY BUSINESS 
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New AED Fea@tuLreS.ccccccccccccccccesesceveeee BOD Sander-Cederlof 


Bill Linn, author of AED, stopped by the other day. Bill is a 
Vice President at Cullinane Corporation, and was in Dallas for 
a user convention. Since it was Sunday, and we are both 

earnest Christians, he spent the morning with Becky and me and 


the kids at church, 


Later we all went out for an excellent 
lunch at the local Harvey House. 


He brought the latest version of AED along, and showed me all 
the new features. AED now has keyboard macros! They are user 
definable, but he has predefined quite a few for you. If you 
type two escapes in a row, the top 18 lines of the screen are 
used to display a menu of all the currently defined escape 
macros. Escape followed by some other character inserts the 
corresponding text string at the current cursor position. 


There is a utility program on the disk for use in defining your 
own macro strings, and it is very easy to use. In fact, you 
use AED editing to modify simple DATA statements within the 


utility itself. 


When you are through with your changes, the 


utility modifies the macro table within AED and on the disk. 


Again I say. if you are not fully satisfied with your current 
stable of Applesoft programming aids, you owe it to yourself to 
buy AED. It will save you countless hours of frustrating 
retyping as you create and edit and restructure and debug and 


modify Applesoft programs. 


Time II 


The most powerful, easiest to use, clock for your APPLE 


@ TIME IN HOURS, MINUTES AND SECONDS. 
@ DATE WITH VEAR, MONTH, DAY OF WEEK AND LEAP VEAR. 
@ FAST DATE AND TIME SETTING. 


@ PROGRAM SELECTABLE 24 HOUR MMLITARY FORMAT OR 12 
HOUR WITH AliiPil FORMAT. 


@ WILL ENHANCE PROGRAMS FOR ACCOUNTING, TIME AND 
ENERGY MANAGEMENT, REMOTE CONTROL OF APPLIANCES, 
LABORATORY ANALYSIS, PROCESS CONTROL, AND MORE. 

© OP SWITCH SELECTABLE INTERRUPTS PERMIT FOREGROUND 
BACKGROUND OPERATION OF TWO PROGRAMS GHAULTA— 
NEOUSLY. 

@ CRYSTAL CONTROLLED FOR 0608 % ACCURACY. 

@ THE EASIEST PROGRAMMING IN BASIC. 

@ON BOARD BATTERY BACKUP POWER FOR OVER 4 MONTHS 
POWER OFF OPERATION BATTERY CHARGES WHEN APPLE 1S 
Om. 


ALL ORDERS SHIPPED SAME DAY 
SEND $129.00 CHECK OR MONEY ORDER 
(TEXAS RESIDENTS ADO 5% SALES TAX) 


APPLIED BNGINEERING 
P.O. BOX 470301 
DALLAS, TEXAS 75247 


iC ie) 
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© WICLUDES DISK CONTAINING MANY TIME ORIENTED UTILITIES, 
PLUS OVER 26 USER CONTRIBUTED PROGRAMS AT NO EXTRA 
cost. 


© TWENTY-THREE PAGE OPERATING MANUAL INCLUDED, WITH 


MANY EXAMPLES OF PROGRAMS TO USE WITH YOUR APPLE IN 
ANY CONFIGURATION. 


MASTER CHARGE & VISA WELCOME 


me (214) 492-2027 eS) 


7:00 AM - 11:00 PM 7 DAYS AWEEK 
APPLE PERIPHERALS ARE OUR ONLY BUSINESS 
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TL Jictaien 
Decision Systems 


S P.O. Box 13006 
ystems Denton, TX 76203 
817/382-6353 


DIS-ASSEMBLER 


DSA-DS dis-assembles Apple machine language programs into forms 
compatible with LISA, S-C ASSEMBLER (3.2 or 4.0), Apple's TOOL- 
KIT ASSEMBLER and others. DSA-DS dis-assembles instructions or 
data. Labels are generated for referenced locations within the 
machine language program. 

$25, Disk, Applesoft (32K, ROM or Language card) 


OTHER PRODUCTS 


ISAM-DS is an integrated set of Applesoft routines that gives indexed file capabilities 
to your BASIC programs. Retrieve by key, partial key or sequentially. Space from 
deleted records is automatically reused. Capabilities and performance that maich 
products costing twice as much. 

$60 Disk, Applesoft. 


PBASIC-DS is a sophisticated preprocessor for structured BASIC. Use advanced 
logic constructs such as IF...ELSE..., CASE, SELECT, and many more. Develop 
programs for Integer or Appiesoft. Enjoy the power of structured logic at a fraction of 
the cost of PASCAL. 

$36. Disk, Applesoft (48K, ROM or Language Card). 


FORN-DS is a complete system for the definition of input and output froms. FORM- 
DS supplies the automatic checking of numeric input for acceptable range of values, 
automatic formatting of numeric output, and many more features. 

$25 Disk, Applesoft (32K, ROM or Language Card). 


UTIL-DS is a set of routines for use with Applesoft to format numeric output, selec- 
tively clear variables (Applesoft’s CLEAR gets everything), improve error handling, 
and interface machine language with Applesoft programs. Includes a special load 
routine for placing machine language routines underneath Applesoft programs. 

$25 Disk, Applesoft. 


SPEED-DS is a routine to modify the statement linkage in an Applesoft program to 
speed its execution. Improvements of 5-20% are common. As a bonus, SPEED-DS 
includes machine language routines to speed string handling and reduce the need for 


garbage clean-up. Author: Lee Meador. 
$15 Disk, Applesoft (32K, ROM or Language Card). 


(Add $4.00 for Foreign Mail) 


*Appie Il is a registered trademark of the Apple Computer Co. 
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Another ReECUrSiVe MaCrO.ccccccccccccccescccecevee es bee Meador 


Last month I sent Bob a recursive macro definition that he put 
in the AAL for everyone to see. In case you have forgotten 
what recursive means, let me explain it somewhat. If you have 
a macro thatcalls itself under certain conditions, that macro 
is called ‘recursive’. It's kind of like the plastic cup I had 
when I was little. There was a picture on the cup of a little 
bear sitting in a high-chair. The bear was holding a plastic 
cup and on the cup was a picture of a little bear in a 
high-chair holding a plastic cup with a picture of a bear ina 
high-chair holding a cup with a picture of a bear...... 


I always used to wonder how many bears there were and how big 
the littlest one was. Now, when we are using recursion in our 
macros we want to be sure we know that there is a last little 
bear -- a last call -- a way of leaving the lowest level of 
recursion. Otherwise (since each recursive call uses up some 
memory/stack space) we will soon run out of room to store the 
return information and BOOM goes the assembly. 


My macro uses the principle of ‘divide and conquer’ to allocate 
a chosen number of bytes all of which hold the value we want 
them to have. We might use this macro with a table of 128 
bytes. All non-alphabetic characters (codes $0 to $40, plus 
assorted others) will have the value S$FF in their corresponding 
bytes in the table. All alphabetics will have a number 
indicating their relative frequency in English text. We could 
set up the table with lines and lines of hex strings for all 
the non-alphabetics. Or we could let the program filter out 
the alphabetics and use a shorter table. But for the sake of 
the example let us assume we need the program to be as fast as 
possible and memory space is no object. 

Here is the macro definition I came up with: 


-MA DB Macro name is “DB* 

DO J1<2 If only one left, 

DA J]2 generate a data byte 

- ELSE If more than one left, 

>DB ]1/2,]2 call DB for half of then, 

>DB ]1+1/2,)]2 and call DB again for the other half 
FIN 

- EM 


Here is the table I talked about: 


>DB $41,#SFF 65 bytes filled with SFF 

e-HS 00000000 upper case (fill in your own frequencies) 
>DB 5, #SFF 5 bytes filled with SFF 

~-HS 00000000 lower case 


>DB 5,#S$FF 5 bytes filled with SFF 
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Here is a sample program to use such a table: 


LDA CHARACTER. BYTE get character 


TAY 
LDA TABLE,Y get frequency 
eoccce and then you have to use it 


The macro calls itself to set up half of the area desired and 
then calls itself again to set up the other half. The adding 
of one to the second call makes sure that both odd and even 
values for the first parameter will work. If the call only 
needs one byte to be set up then a .DA is used to take care of 
it. That provides the end of the little bears -- when the 
first parameter is one. 


When I needed a macro like this my first idea was to have each 
recursive call take care of one byte and then call itself to 
take care of the rest. If the macro was called with zero 
repetitions then nothing would be done except end the macro, 
The problem with that method is the amount of stack space used 
as the recursion goes to very deep levels. The method used in 
the example will only recurse, for example, 8 levels to 
generate 127 bytes of data. 


By the way, notice that you must put the pound sign (#) on the 
second parameter if you want to generate single bytes. Leaving 
it off will generate two-byte values of data. I chose that 
method to make the macro more flexible. You might want to put 
the pound sign (#) inside the macro to make it safer in case 
you always want to generate single bytes of data. Also, you 
can use calculated values like #'F+$80 to generate tables of 
some character value. 


The assembly of recursive macros produces quite a few extra 
lines in the listing, so after checking it out you will 
probably want to turn off the listing of the macro expansion 
with ".LIST MOFF*. Here is a sample listing with the macro 
expansion listing on: 


ones 0000> DBO de 
1000 .MA DB 0000> ELS 
1010 -DO ]3<2 0800- 0000 SDB 3/2,#0 
1020 “DA J2 0000>> .DO 3/2<2 
1030 “ELSE 0800- 00 0000>> “DA #0 
1040 SDB 1/2, ]2 0000>> ELSE 
1050 SDB ]14+1/2, J2 0000>> FIN 
1060 .FIN 0801- 0000> >DB 3+1/2, #0 
1070 .EM 0000>> .DO 3+1/2<2 
1080 0000>> * ELSE 
0801- 000055 SDB 3+1/2/2, #0 
0000>>> .DO 341/2/2¢2 
0801- 00 0000955 “DA #0 
0000>>> “ELSE 
0000>>> “FIN 
0802~ 0000>> >DB 3+1/24+1/2, #0 
0000>>> .DO 341/241/8<2 
0802- 00 0000>>> “DA #0 
0000>>> * ELSE 
0000>>> FIN 
0>5 FIN 
0000> FIN 
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INTRODUCING AED 1€C 


Aa POWNERFUL ATD 
FOR APPLESOFT PROGRAM DEVELOPMENT 


o A full function line editor suprorts character insertion, single and multirle 
character deletion, line truncation, instant cursor positionins to a specific 
character, the beginning, or end of any APPLESOFT line. 


o All editins functions are in effect while entering new APPLESOFT statements 
as well as revising eristina lines of your Basic Prosgrams. 


o Search your APPLESOFT program for a particular string and immediately besin 
editing the line with the cursor positioned on the matching strins. 


o.6GGlobal search and replace one string with another in all or selective lines. 
o Wildcard characters surrported in searching: /#TAB/ matches HTAB, VTAB, etc. 


0 User defined ESCAPE MACROS: Insert commonly used Aprplesoft words and 
Phrases into the line beings edited by pressing ESC and a sinsle key. 


o Automatic line numbering with user specified increment. 
0 Sophisticated LIST control allows pase-at-a-time, line-at-a-time, fast and 
slow speed scrolling of APPLESOFT lines. Say goodbye to CTRL-S and CTRL-C. 


Single key rereat of last LIST command eliminates retyrpins line number ranse. 


0 AED remains resident while RUNnins your APPLESOFT program. Single key-stroke 
exit from AED: reentry to AED via & (ampersand) or pressins RESET. 


o A Sinsle key command displays the names and values of each APPLESOFT simple 
variable (very useful in debugging). 


o DOS command menu rrovides CATALOG (Di or D2), LOAD, SAVE, LOCK: UNLOCK; or 
DELETE of the current pProSram via one or two keystrokes. 


Oo Direct keyboard entry of {; J+ \r and — characters. 
o Single key HELP screen and ESC MACRO menu even while editins a line. 


o Careful attention to human factors: blinkins underscore cursor, soft bell 
tone for errors. visual mode indicator, and minimal keystroke commands. 


o AED is 100% Assembly Language and uses approximately 5K RAM. Aprile 
with 48K RAM, Arpplesoft ROM, and DOS 3.3 are required. 


AED Jf DISKETTE & USER GUIDE:........$40.00 
DEALER INQUIRIES INVITED 


LINN SOFTWARE 
31997? HAMMOCK CREEK 
LITHONIA, GEORGIA 300538 
C404) 483-7637 
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RWTS CALLER Tele re eT ee ee ee ee eee ee ee o's Bill Morgan 


Here iS a routine to directly call RWTS (Read/Write 
Track/Sector), the subroutine in DOS that actually reads from 
Or writes to the disk. Many programs use a routine like this 
to handle disk I/0, without all the time-consuming overhead of 
the DOS file manager. 


All you need to do to use RWTS directly is to place certain 
information into an Input/Output control Block (IOB), and tell 
RWTS where the IOB is. Following is an explanation of the IOB 
(the addresses are those of DOS's own IOB; you can use it 
yourself, or build your own wherever is convenient): 


Address Description 


SB7E8 Table type, always $01 

SB7E9 Slot number times 16. usually $60 

SB7EA Drive number, $01 or $02 

SB7EB Volume number expected, $00 matches anything 

SB7EC Track number, $00 through $22 

$B7ED Sector number, $00 through SOF 

SB7EE-F Address of Device Characteristics Table, $B7FB 
for DOS‘'s own DCT 

SB7FO0-1 Address of buffer, wherever you want 

SB7F2 Not used 

SB7F3 Byte count if partial sector, $00 normally 


SB7F4 Command $00 = SEEK 
$01 = READ 
$02 = WRITE 
$04 = FORMAT 
SB7F5 Error Code $00 = No errors 
$08 = Error in initialization 
$10 = Write protect error 
$20 = Volume mismatch 


$40 = Drive error 
SB7F6 Last volume number 
SB7F7 Last slot number times 16 
SB7F8 Last drive number 


The Device Characteristics Table (whose address is at SB7EE,EF) 
is a four-byte block containing information about the disk 
drive. For a standard Apple Disk II this block always contains 
$00 01 EF D8. 


For our purposes, the most important items in the IOB are 
track, sector, buffer address, and command. By manipulating 
these, you can read any sector of the disk into any area of 
memory. All you need to do is set up the IOB, load the A- and 
Y-registers with the address of the IOB, and JSR $3D9. And if 
you decide to use the file manager's IOB, you can even set up 
the A- and Y-registers by a simple JSR $3E3. 


RWTS will read the track and sector you choose into your 
256-byte buffer. If there was a disk error, RWTS will return 
with the carry bit set and an error code stored in the IOB. It 
is then up to the user's program to decide what to do about the 
error, If there was no error, carry will be clear, 
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QuICKTRACE 


relocatable program traces and displays the actual machine operations, while it is running 
without interfering with those operations. Look at these FEATURES: 


Single-Step mode displays the last instruction, 
next instruction, registers, flags, stack contents, 
and six user-definable memory locations. 


Trace mode gives a running display of the Single- 
Step information and can be made to stop upon 
encountering any of nine user-definable 
conditions. 


Background mode permits tracing with no display 
until itis desired. Debugged routines run at near 
normal speed until one of the stopping cond- 
Itions is met, which causes the program to return 
to Single-Step. 


QUICK TRACE allows changes (fo the stack, 
registers, stopping conditions, addresses to be 
displayed, and output destinations for all this 
information. All this can be done in Single-Step 
mode while running. 


Two optional! display formats can show a sequence 
of operations at once. Usually, the information 
is given in four lines at the bottom of the screen. 


QUICK TRACE is completely transparent to the 
program being traced. It will not interfere with 
the stack, program, or I/O. 


QUICK TRACE is relocatable to any free part of 
memory. Its output can be sent to any slot or to 
the screen. 


QUICK TRACE is completely compatible with 
programs using Applesoft and Integer BASICs, 
graphics, and DOS. (Time dependent DOS 
operations can be bypassed.) It will display the 
graphics on the screen while QUICK TRACE Is 
alive. 


QUICK TRACE Is a beautiful way to show the 


incredibly complex sequence of operations that 
a computer goes through in executing a program 


QutcKTRACE $50 


Is a trademark of Anthro-Digital, Inc. 
Copyright © 1981 
Written by John Rogers 


See these programs at participating Computerland and other 


fine computer stores. 


Anthro - Digital Software, Inc. 


P.O. Box 1385 Pittsfield, MA 01202 
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This month we'll set up a short program using the RWTS Caller 
to read an entire track of the disk into 16 consecutive pages 
of memory. DOS stores information on a track starting at 
sector SOF and working back to sector $00, so we must read a 
sector into the buffer, decrement the sector in the IOB, and 
increment the buffer pointer. 


RWTS .CALLER: 


Lines 1680-1850 set up the IOB, transferring values from 
the program variables. 


Lines 1870-1890 load the address of the IOB and call RWTS. 


Lines 1900-1910 are necessary to avoid confusing the 
system monitor. (RWTS and the monitor both use location 
$48.) 


Lines 1960-2030 ring a warning if a disk error occurred, 
and display the error code. 


TRACK READ: 


Lines 1260-1350 initialize the variables and call input 
routines. 


Lines 1370-1440 read the sectors from SOF through $00 into 
the buffer. Line 1410 will end the program if an error 
occurred, 


Line 1460 will become a display routine. (Or, whatever 
processing you want to do on the buffer.) 


Lines 1500-1650 will become input routines; right now they 
just set the track, buffer and command variables. 


CAUTIONS: 


1) These routines have very little error-checking. It is 
very easy to make a trivial error and lose information 
from a diskette. Always test an RWTS-calling program on a 
diskette you don't care about. 


2) If you store information on a blank area of a diskette 
using these techniques, DOS doesn't know you have taken 
some space. Unless you modify the VTOC to show that the 
sectors are used, DOS can overwrite your data. (What's a 
VTOC?, you say. Volume Table of Contents. We'll go into 
that another time.) 

There is more about RWTS on pages 94-98 of the Apple DOS 

Manual, and a goldmine of information in Beneath Apple DOS, by 

Don Worth and Pieter Lechner. (Quality Software, 1981.) 
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1096 SAVE TRACK READ 
0000- 1020 SLOT ~EQ $60 a OR $70 
0001- hi DRIVE .EQ $01 OR 2 
0002- 1040 VOLUME .EQ 302 O = DON'T CARE 
0003- 1050 TRACK .EQ $0 00 TO $22 
0004- 1060 TOR .EQ $0 00 TO $0F 
0005- aDhe BUFFER  .EQ $05, 
0007- 1080 COMMAND .EQ of 1 = READ, 2 = WRITE 
0O48- ato PREG EQ $4 
03D9- Ae8 RWTS -EQ $3D9 
BTE8- 1186 I -EQ $B7E8 DOS'S OWN IOB 
BTE9= 1140 IOB.SLOT eEQ $B7E9 
BTEA- i260 IOB.DRIVE B7EA 
B7EB- 1160 IOB.VOLUME . B7EB 
BTEC=- uy IOB.TRACK  . BTEC 
B7ED- 1180 IOB.SECTOR . B7ED 
BTFO= 13A6 IOB.BUFFER .EQ ate 
BUFR 1200 IOB.COMMAND .EQ FA 
B7F5=- toon TOB.ERROR -EQ $B7F5 
FDDA- eh PRBYTE .EQ gEDDA 
FDED- ' ; COUT .EQ ED 
1380 SETUP 
0800- he 60 iene LDA #$60 
a ee tore 
SB etiam: 
080A- Be 02 1320 STA VOLUME ANY VOLUME 
O080C=- 20 25 08 4305 JSR GET. TRACK 
O80F= 20 2A 08 1340 JSR GET. BUFFER 
0812=- 20 33 0 : 26 ‘ JSR GET.COMMAND 
1 he READ. TRACK 
SU A HE toe, Stanr ar sncron for 
08 19- 20 38 08 1 30 1 JSR RWIS.CALLER READ ONE SECTOR 
081C= BO 06 1410 BCS EXIT EXIT IF ERROR 
O81E- E6 06 1420 INC BUFFER+1 NEXT BUFFER PAGE 
0820- C6 O4 1439 DEC SECTOR NEXT SECTOR 
O822= 10 F5 ‘ : - BPL .1 NOT DONE, READ NEXT SECTOR 
1460 DISPLAY 
O824- 60 1480 EXIT RTS 
ae pn Be 
0827- ae 03 1520 STA Feld TRACK $11 (DIRECTORY) 
0829- 60 eRe RTS 
1320 GET. BUFFER 
O82A=- AQ 00 1560 #0 
O82C- 85 05 sy STA BUFFER BUFFER AT $4000 
O82E- AQ 40 1580 LDA #$40 
0830- 85 06 1230 STA BUFFER+1 
0832=- 60 ieee RTS 
1620 GET.COMMAND 
OR 33 he 01 16 30 LDA #1 
0835- 85 07 1640 STA COMMAND READ 
0837- 60 1650 
1670 RWTS. CALLER 
0838- A5 00 1680 LDA SLOT TRANSFER 
att ae 
See | ates 
ee ne 
aa hae Te 3 
O84E- 8D ED B7 1770 STA IOB.SECTOR 
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0851=- A5 af 1780 LDA COMMAND 

0853- 8D F4 B7 1730 STA IOB.COMMAND 

0856- A5 05 1300 LDA BUFFER 

0858=- 8D FO B7 1810 STA IOB. BUFFER 

O85B- A5 06 1820 LDA BUFFER+1 

were 8D F1 BT 1830 STA IOB. BUFFER+1 

0860- AQ 00 1840 LDA #$00 

0862- 8D F5 B7 1890 P STA IOB.ERROR 

08 63- AO E8 1870 LDY #I0B LOAD IOB 

O867=- AQ BT 18380 LDA /IOB ADDRESS 

0869- 20 D9 03 3 JSR RWTS CALL RWIS 

086C- AQ O 13 0 LDA #300 

O86E- 85 4 1910 STA PREG SOOTHE MONITOR 

0870- BO 01 1920 BCS ERROR. HANDLER 

0872- 60 aAbn RTS 
1 9 0  ) 2 O OG BS See oaoeaeac > ED GD GD OP OD OS BSS Oo@aee 
1950 ERROR.HANDLER 

0873- AQ 87 1960 LDA #$87 BELL 

oT 20 ED FD rake JSR COUT RING 

0878- 20 ED FD 1980 JSR COUT ING 

O87B- 20 ED FD 1990 JSR COUT ING 

it F5 B7 2000 LDA IOB.ERROR 

0881- 20 DA FD 2010 JSR PRBYTE DISPLAY ERROR CODE 

O884- 38 2020 SEC EXIT WITH CARRY SET 

0885- 60 2030 RTS 


OFTEN WONDER HOW MACHINE LANGUAGE PROGRAMS WORK? 
Well stop wondering and do something about it! Use OLSASM to convert 6502 @achine code into aeaningfull, 
| syabolic source. Create a text file which is directly compatable with DOS Toolkit, LISA and S-C (both 4.0 
/ & Macro) Asseablers. OISASM handles data tables, displaced object code and even lets you substitute 
| MEANINGFUL labels of your own choice (100 commonly used Monitor & Pg Zero names included in Source fora to 
get you rolling). An address-based cross reference table provides even aore insight into the inner 
workings of @achine language prograas. DISASH 1s an invaluable aid for both the novice and expert alike. 
DISASM (Version 2.2)3 $30.00 


Utilities For Your S-C Assembler (4.0) 
Enhance Your Assembler And Keduce Valuable Developaent Time With These Handy Support Prograas 
f SC.G5R: A Global Search and Replace Eli@inates Tedious Manual Renasing Of Labels.....s.seeeee SL2O.00 
SC. AREF: A Linenuaber-based Global Cross Reference Table For Coaplete Source Docuaentation... $20.00 


| SC.TAB: labulates Source Files Into Neat, Readable Fore. Encourages Fast, Free-Foraat Entry. $15.00 
SC UTILITY PAK: Includes All Ihree Utilities Described Above (You Save $10.UU) cs creecsecsress P4Ie. VU 


Avoid A $53.00 Shipping/Handling Charge By Mailing Full Payaent With Order 


Each Of The Above Frograas Is Supplied In 3.3 DUS Format Uniess Otherwise Requested. A Detailed User's 
Manual Is Inciuded. All Programs Are In Machine Language And Run On Erther an APPLE II or APPLE IJ PLUS. 


FAK - WARE 
41 Ralph Koad 
West Urange NJ O/7U0S52 
(201) 325-1885 


$8988 SAY YUU SAW 1) IN 7HPPLE ASSEMBLY LiNE’ 3988 
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Reading the Game ButtonS....cccccceccccccccccecccescedim Kassel 


Recently I was asked to come up with a maching language 
subroutine that involved using the Apple game buttons. 
Fortunately for me at the time, I forgot that my paddles were 
not plugged in. I was in for a rude awakening because when i 
tested the program, it said that all of the buttons were 
constantly being pushed! 


I needed some additional programming to check whether the 
buttons were even plugged in. The problem occurs because the 
Apple button logic returns the same value for a pushed button 
as for a missing button. To get technical: in TIL logic, when 
an input pin of an IC chip is left unconnected, the chip thinks 
the pin is at a logic "1". The Apple buttons supply a logic 
*1" when they are plugged in and pushed. Hence, the hardware 
cannot tell the difference between a plugged-in-pushed-down 
button and a missing button. 


What the hardware does know for sure is when a button is 
plugged in and not pushed. This is the only case in which a 
logic "0° is developed. I had to use this knowledge to write a 
program which could tell what a logic °1" really means. Since 
an installed unpushed button does unambiguously announce its 
presence by a "0" in bit 7 of the input byte, I could make a 
mask indicating which buttons appear to be instailed. 


I started by writing the GET.BUTTON.STATUS subroutine. It 
reads each of the three buttons, and packs the three bit-7's 
into one byte. The way I wrote it, bit 7 of the returned byte 
represents button 1]. bit 6 is button 2, and bit 5 is button 3. 
If a button is installed and not pushed, the corresponding bit 
will be "1"; otherwise it will be "0°. 


Look at the listing, lines 1250-1350, and I'll describe how 
GET.BUTTON.STATUS works. I used an indexed loop, where X goes 
from 2 to 0, step -l, addressing all three of the buttons. 

Only bit 7 of a button byte is significant. I invert this bit 
(line 1280), and shift it into the carry status bit (line 
1290). Then line 1300 rolls the bit into GB.PUSH. After all 
three have been read and rolled, I pick up GB.PUSH and zero out 
the lower five bits at line 1340. 


Now lets look at the other three subroutines. 
GAME.BUTTON.INITIALIZE simply clears out GB.STAT. We have to 
start with GB.STAT = 0. so that as we discover each installed 
button we can set its bit. Call this subroutine once at the 
beginning of your overall run. 


GAME.BUTTON.INSTALLED reads the current button status; remember 
that a "1" here indicates an installed but unpushed button. So 
line 1140 merges all "1" bits into GB.STAT. You need to call 
this subroutine several times, at time intervals of several 
seconds at least, to be sure that every installed button is 
noticed at least once. (The first few times you call it, you 
might be pushing down an installed button; then finally you let 
go, so this subroutine sees the button.) 
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GAME .BUTTON.PUSHED reads the current button status, and with a 
little boolean logic comes out with the final result: a "1" 
indicating an installed and pushed button, and a "0" meaning 
either a missing button or an unpushed button. The result is 
in the A-register, and also in GB.PUSH. 


Here is a truth table of the logic involved: 


GB.STAT CURRENT READING EOR AND 
STAT STAT 

0 (no button) 0O (none or pushed) 0 0 

0 (no button) 1 (unpushed) 1 0 

1 (button) 0 (none or pushed) 1 1 

1 (button) 1 (unpushed) 0 0 


There are other possible complications in reading buttons, 
which I have not handled here. You might want to "“debounce" 
the buttons, so that you don't get false indications of 
multiple pushes when the button begins to make or break 
contact. And, you might want to guarantee that any action 
which happens from a pushed button only happens once per push. 


Lines 1400-1910 demonstrate the usage of the subroutines. 

After clearing the screen, the buttons are continuously 
monitored until you press any key on the keyboard. The status 
of each button will be displayed on the screen: button 1 on the 
to line, button 2 on the second line. and button 3 on the third 
line. If you hold a button pushed and then start the progran, 
it will say “not installed" until you release the button; from 
then on it will track the button properly. 


If you have the shift key mod installed in button 3, it will 
say "not installed® until you press the shift key; from then on 
it will say "pushed" when you are not pushing, and “not pushed" 
when you are. This is because the sense of the shift key is 
the opposite of the normal game paddle buttons. 


1010 ¢ GAME BUTTON SUBROUTINES 
C06 1- 1850 9 QAME.BUTTON .EQ $C061 BASE ADDRESS 

O50 .OR $800 
sai 8 8G QAME.. BUTTON ton 
0802- ” 33 08 9 8 aT A STAT 
0805- 

: naa t ec uunnenanccnn 
0806- | AME. BUTTON AIS EL 
0 oc- | A gp. at SET ATs OF ANY BUTTONS 
080C~ A PLUGGED IN AND NOT PUSHED 
agoc- § A 
0810 aaa ban PUSH HUTTON , STATUS 
“i dt mt Nisk bur BUTTONS WHICH 

081 f 7 AND (DB. tA ARE NOT PLUGGED IN 
Se & i ob 
081E- 60 { 
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(O10) Wai oS cece eae tee loot eee 
081D=- A2 02 1380 Seon pegs et 
O81F- BD 61 CO 1270 .1 LDA GAME. BUTTON ,X 
0822= 49 1280 EOR #380 INVERT SENSE 
O82h- OA 1290 ASL INTO CARRY BIT 
0825- 6E 32 08 1300 .2 ROR GB. PUSH 
0828- CA 1310 DEX NEXT BUTTON 
SE IS og SBE ad run 
O82E- 28 £0 = 13480 #$E0 CLEAR EXTRANEOUS BITS 
0830- 60 50 : RTS 
0 31- 1 70 GB.STAT .BS 1 
0832- 0 GB.PUSH .BS 1 
0025- 1 60 MON .CV «EQ $25 
Fc58- 1110 MON.HOME .EQ $FC58 
FC22- 1420 MON.VT °EQ $FC22 
FC9C- 1430 MON.CLREOL .EQ $FC9C 
FDED- 1440 MON.COUT | .EQ 
0000- 1450 TEST. .EQ $00 
0833- 20 58 1470 TEST JSR MON.HO 
0836- 20 00 08 1480 JSR GAME. BUTTON. INITIALIZE 
0833-4 rt iae0 " et ou.cv 
083D- 20 22 Fe 1510 JSR MON. VTAB 
O8%0- 20 06 08 1520 JSR GAME.BUTTON. INSTALLED 
ghee 62 gb OF 323g BE GRRE SOTTO 
Ok - 85 00 1990 STA TEST .MASK 
ohags ou a tea BNE gr one HED 
O85 A5 0 1590 LDA TEST.MASK 
, se Sota Rte “STAT or 
0 8- AQ 10 1620 LDY #QTGONE-QTS NOT INSTALLED 
oB5R- AO 00 1640 3 LDY #QTPUSHED-QTS 
O8bE- AO 06 1660 2 LDY #QTNOTPSH-QTS 
0860- 20 72 08 1 79 JSR MSGOUT 
0863- 46 00 © 1680 LSR TEST.MASK 
0865- 90 E 1690 BCC .2 
SH 1B og co ude ppt Hea 
SHS §B T0 co tiegBE eoro 
0872- : 87 08 1780 MSGOUT LDA QTS,Y 
0 e- 09 80 —s ‘1 ho ORA #$80 
SE 3 By Bll. coor 
087C- 68 1810 PLA 
087D- 10 F 1820 BPL MSGO 
08 F- 20 FC 1830 JSR MON . CLREOL 
O884—- 4C ED FD 1850 : P MON.COUT 
0887- 50 55 5 en i 
O88A- BB 5 28 1880 QTPUSHED .AT /PUSHED/ 
O88D- 4E AF 54 
Opes 85 RB Re 
0896- aR 1890 QINOTPSH .AT /NOT PUSHED/ 
0897- 4E 4F 54 


O8A3- C4 190 
191 


oo 
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~AT /NOT INSTALLED/ 


Macro Branch LA DPOY haeGi bare 6 eR eh hw hiwle'e We Sa wis Se Se Re ee ew eens F. O'Brien 


When I received my copy of the S-C Macro Assembler, my first task was to make 
up a set of branch macro definitions to use in all my programs. This set 
will finally eliminate the need to check usage: of BCC, BCS, etc., and 
generally make the programs more readable. 


There are six branch-on-tests: BLT, >BLE, >BGE, >BGT, >BEQ, AND >BNE. All 
of these would normally be used with two parameters, e.g. >BGT P1,P2...reads: 
if contents of acoumulator is greater than P1 then branch to P2. The first 
four of these oan be gainfully used with only one parameter, after a 
comparison. Sample program: 


LDA #$8D 
CMP #$8E 
>BLT THERE ... results in a branch to THERE 


While >BEQ and BNE are defined so as to work with only one parameter, there 
is no reason to so use them - it is easier to just use BEQ and BNE. 


The macro >BRA (BRanoh Always) is used with one parameter - any others are 
ignored. >BRA LABEL oauses a jump to LABEL, up to +- 127 bytes away. To 
overcome this limitation I decided to put the macro facility to good use to 
provide for easy branohing to any part of a program - this is necessary for 
writing relocatable code, I settled for a two-paramter code >JMP: 


>JMP P1,P2 ... where P1 is the intermediate or final label you wish to branch 
to and P2 ia the label for this instruction. 


Instructions such as the foregoing are inserted anywhere you wish in the 
program (within 127 bytes of each other) to allow for unlimited branching 
whilst retaining relocatable code. The following is an example of how you 
might use the >JMP code: 


1000 A eto. 
(more code.... ) 


2000 >JMP A,B 
(more code....) 
3000 >BRA B 


When a program designed as the above is run it will simulate an absolute jump 
to A. The >BRA B will branch to label B, which contains a >BRA A. This 
sequence of instructions is transparent to the rest of the program, as the 


first instruction in the >JMP is to skip around the the >BRA within the 
definition. 


This use of macro definitions can easily be extended to the X and Y 
registers; simply substitute CPX's or CPY's for the CMP's. 


Following are some examples of these macros at work: 
>BLT #4, TUERE....i4f (A) is less than 3 then go THERE 
>BOT O40, THIS....if (A) is greater than ($40) then go THIS 
>BEQ @'A,THAT....1f (A) is equal to $41 then go THAT 


To use theae macroa jn all your programs, place the command .IN 
MACRO.BRANCH.LINKANY at the beginning of your source program, 
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# MACRO BRANCH LIBRARY 
# BY R.F. O'BRIEN 


BRANCH IF (A) < P1...TO P2 


es 
: 
J 
ba °] 
— 
~ 
sao] 
nN 
ww 


“DO 1 


ow NIN EWN — O 


DAIAT EWA —§ OW OI HUI SWNY) 2 O10 IHU EW Coo] —_ 


# BLE P1(,P2) BRANCH IF (A)<=P1...TO P2 


aaa ot st_OOOOOO0O00O 


S$ wee 

® BGE P1 (.P2) BRANCH IF (A)>=P1...T0 P2 
.MA BGE 

“DO i" 


Bean 
#  >BGT P1 (,P2) BRANCH IF (A)>P1...T0O P2 


WWI UWIGIUIU) PO NO PO ND POND PD DOPOD <8 a ot ot 
DOOD OOO OOCOO COOCOCOOOSCOOCOOSOSOSOCSOSOSCOSEoeoeo 
e 
b 


ee ek ee eee we a ee ee ak eek ed ae ont nh mad ond ed A A A A aah and anh ach anh anh 


amb anh 
Fr. 
=—Ow} 
ooo°o 
oo e 
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© 
eo 
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LOW, LOW PRICES ON PERIPHERALS AND SOFTWARE 
WE HAVE MOST POPULAR - PRINTERS, MONITORS, & CARDS 
OKIDATA, IDS, QUME, NEC, EPSON, AMDEK, CCS, SSM & MORE 


HAYES - MICROMODEM II 


289 
MICRO SCI - AZ DISK DRIVE wo/cntr 395 
MICROSOFT - SOFTCARD WITH CP/M 285 
MICROSOFT -—- RAMCARD 16K 125 
NOVATION - APPLE CAT II (1200 baud) 335 
STB - 64K CARD Z299 
STB - 128K CARD 909 
STB -—- 80 (80-—-column card) 250 
VIDEX - VIDEOTERM CARD wi/softsw 279 
VIDEX - KEYBRD ENHANCER II (rev 7 & up?) 120 


Phone (214) 363-7831 - Local pickup in Dallas 
Checks (allow 10 days to clear) and money orders welcome. NO COD's. 
Shipping & handling: 2% (52.50 min) continental U.S.; 10% for Foreign & APO. 
PRODUCTS SUBJECT TO PRICE CHANGE & AVAILABILITY WITHOUT NOTICE 


WRITE OR CALL FOR FREE DISCOUNT CATALOG 
MICRO MART - —- BOX 12021 -- DALLAS, TX 75225 
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0 © >BEQ P1 (,P2) BRANCH IF (A)=P1...TO P2 


0 ® BNE P1 (P2) BRANCH IF (A)<>P1...TO P2 


0 ® >JMP P1,P2 BRANCH ALWAYS TO P1 BY 
0 8 BRANCHING TO P2 (SEE ARTICLE) 


eo adh ed eed ed edd ed eds ed ed we es ee eee ed ed et ed sd et td sd ed et wd oe el et wt es eh est ed et ot sd os od 
CD CD ind PPP PPD DPD FISTS SCS Seer 
2 A) = ce 
ooooco 
e °@ w 
fora be 
HOrom 
— ff) 


Good Price on the NEC printers 


I can ship you an NEC PC-8023A-C dot matrix printer for only 
$595. I believe the normal list price is $795, but mail order 
prices are generally less. I also have the Grappler interface 
card and cable, configured for the NEC printer, for only $150 
(normally $175, I think). And if you want both printer and 
interface at the same time. the combined price is only $695. 


| have two of these printers, and like them better than my 
Kpaon MX-80. Why? Faster: 100cps instead of 80cps. Fully 
equipped: standard features include graphics, tractor feed, 
and fr1lction feed. Handier: the friction feed is just like a 
(typewriter, platen and all; and option switches, should you 
wieh to change them, are accessible without removing any 
ncrewa. IF run one of them with an Epson parallel interface, 
and the other with the Grappler. 


If you would rather have a Spinwriter (that is what this 
newnletter ia printed on), call me for prices. 
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es 


NOP 
N COMPUTER SYSTEM ORGANICER 


Arrange all your equipment together! 

Lock the APPLE II in the ORGANIZER. 

Power strip mounts on rear = 1 switch. 
Vented for air flow - room for fan. 

Printer Organizer fits on top or along side. 
Any monitor or portable TV fits on top. 
Simulated Walnut with vinyl coating. 


COMPUTER SYSTEM ORGANIZER $75.00 
PRINTER ORGANIZER 30.00 
6 PLUG POWER SWITCH w/BRKER 25.00 
APPLE II LOCK KIT 25.00 


PEDESTAL STAND w/CABINET (avail soon) 


Computer Furniture 


a div ef 


Software Syvetems Support Inc. 


2001 Flagetene Dr 
Gerlend, TX 75042 
214 405-1058 

recerding answer service 


Apple Assembly Line is published monthly by S-C SOFTWARE CORPORATION, P. O. 
Box 280300, Dallas, Texas 75228. Phone (214) 324-2050. Subscription rate is 
$15 per year in the USA, sent Bulk Mail; $18 per year sent First Class Mail in 
USA, Canada, and Mexico; $28 per year sent Air Mail to other countries. Back 
lssues are available for $1.50 each (other countries add $1 per back issue for 
postage). All material herein is copyrighted by S-C SOFTWARE, all rights 
reserved. (Apple is a registered trademark of Apple Computer, Inc.) 
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